﻿Imports DevExpress.Web.ASPxScheduler
Imports DevExpress.XtraScheduler

Public Class ucActividadFormController
    Inherits DevExpress.Web.ASPxScheduler.Internal.AppointmentFormController


    Public Property CantidadComisariosSubscriptos() As String
        Get
            Return EditedAppointmentCopy.CustomFields("CantidadComisariosSubscriptos").ToString
        End Get
        Set(ByVal value As String)
            EditedAppointmentCopy.CustomFields("CantidadComisariosSubscriptos") = value
        End Set
    End Property

    Public Property SourceCantidadComisariosSubscriptos() As String
        Get
            Return SourceAppointment.CustomFields("CantidadComisariosSubscriptos").ToString
        End Get
        Set(ByVal value As String)
            SourceAppointment.CustomFields("CantidadComisariosSubscriptos") = value
        End Set
    End Property

    Protected Overrides Sub ApplyCustomFieldsValues()
        SourceCantidadComisariosSubscriptos = CantidadComisariosSubscriptos
    End Sub

    Public Overrides Function IsAppointmentChanged() As Boolean
        Return True
    End Function


    Public Sub New(ByVal oASPxScheduler As ASPxScheduler, ByVal oAppointment As Appointment)
        MyBase.New(oASPxScheduler, oAppointment)
    End Sub
End Class
